﻿Public Class FormFindCheckOut
    Dim MReservation As MainReservation
    Sub New(ByVal MReservation As MainReservation)

        ' This call is required by the Windows Form Designer.
        InitializeComponent()
        Me.MReservation = MReservation
        ' Add any initialization after the InitializeComponent() call.

    End Sub

    Private Sub BtnClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnClose.Click
        Me.Close()
    End Sub

    Private Sub BtnFind_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnFind.Click
        Me.MReservation.FindGuestCheckOut(DateFrom.Value.Date, DateTo.Value.Date)
        Me.DialogResult = Windows.Forms.DialogResult.OK
    End Sub
End Class